home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / OBJ1_2.ZIP;1 / C_MD.TXT < prev    next >
Encoding:
Text File  |  1992-12-22  |  1.9 KB  |  65 lines
  1. '
  2. 'Class description:
  3. '
  4. !short:MD class structure:
  5. Class MD:
  6. ~~~~~~~~~~
  7. Used as the help data structure for the class Menu.
  8. (clipper doesn't know the structured records yet)
  9.  
  10. Common use:
  11. ~~~~~~~~~~~
  12. There is no sense to use the object of this class indenpendently.
  13.  
  14. Source code is in C_Menu.prg
  15.  
  16. !seealso: c_menu.ngo:Menu c_view.ngo:View c_dbf.ngo:Dbf c_color.ngo:Color ob_class.ngo:"Class Hierarchy"
  17.  
  18. !short:~~~~~~~~~~~~~~~~~~~~
  19. !short:create class MD
  20. !short:  export:
  21. !short:  var Name      //""
  22. ^BMD:Name^N: public: character
  23.   Menu item name.
  24.  
  25. !short:  var ID        //0
  26. ^BMD:ID^N: public: numeric
  27.   Array Menu:Block and Menu:Avail pointer, (the menu item identifier)
  28.  
  29. !short:  var Help      //0
  30. ^BMD:Help^N: read-only: numeric
  31.   Contain the RecNo of help item (in the help database (system3.dbf))
  32.   for this MD (menu data structure) object.
  33.  
  34. !short:  var Data      //nil
  35. ^BMD:Data^N: public: array
  36.   The array of MD objects for items submenu.
  37.  
  38. !short:  var Idx       //1
  39. ^BMD:Idx^N: public: numeric
  40.   The current item of MD:Data, after the return to this menu level is the
  41.   cursor position restored.
  42.  
  43. !short:  var CheckIt   //false
  44. ^BMD:CheckIt^N: public: logical
  45.   If true, the item is checked, it serves as switch.
  46.  
  47. !short:  var PreBlock  //{||true}
  48. ^BMD:PreBlock^N: public: code_block
  49.   The code block precessed before entering of the current item. As parameters
  50.   receives the instvar variable ID of this data structure (the copy of the
  51.   object of the MD class) and the second parameter is the menu item width.
  52.   Can be used for next window position counting (see the Box:GoodInit()).
  53.  
  54. !short:  var PostBlock //{||true}
  55. ^BMD:PostBlock^N: public: code_block
  56.   The code block processed when leaving the item, it becomes the same
  57.   parameters as MD:PreBlock.
  58.  
  59. !short:  method New=MDNew   //o:New() --> self
  60. ^BMD:New()^N: public: return self
  61.   Object is filled with the default values.
  62.  
  63. !short:  endclass
  64.  
  65.